home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64-128Toolkit / 3MINCPY.ARC / C35 9.1 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2019-04-13  |  699 b   |  28 lines
  1. 5 ;MAIN SCREEN DISPLAY
  2. 10 SCREEN LDA #$00;PRINT SCREEN FORMAT
  3. 20 STA BDR
  4. 40 STA BGRND
  5. 50 LDA #$93:JSR PRINT
  6. 55 JMP DISP
  7. 60 SC .BYTE 32 32 32 32 32 32 32 32 32
  8. 120 .BYTE "[159] PBW SOFTWARE C35-F44 "
  9. 240 .BYTE 13 13 13
  10. 280 .BYTE 32 32 32 32 32 32 32 32 32 32 32 32 32 32 32 32 32 32
  11. 290 .BYTE "[156] BY "
  12. 300 .BYTE 13 13
  13. 340 .BYTE 32 32 32 32 32 32 32 32 32 32 32 32
  14. 350 .BYTE "[158] C.F. LE MIEUX
  15. 380 .BYTE 13 13 32 32 32 32 32 32 32 32 32 32 32
  16. 430 .BYTE " PRESS F7 TO EXIT "
  17. 440 .BYTE 13 13 32 32 32 32 32 32 32
  18. 450 .BYTE " PRESS RETURN TO CONTINUE "
  19. 460 .BYTE 13 0
  20. 470 DISP LDY #$00;[153] THE SCREEN ROUTINE
  21. 480 LP LDA SC,Y
  22. 490 CMP #$00
  23. 500 BEQ [203]MRE
  24. 510 JSR [153]:INY
  25. 520 JMP LP
  26. 530 [203]MRE RTS
  27. 540 .FILE C35 10
  28.